home *** CD-ROM | disk | FTP | other *** search
-
- procedure ColdBoot; assembler;
- asm
- xor ax,ax
- mov ds,ax
- mov ah,$40
- mov es,ax
- mov word ptr es:$72,0
- mov ax,$FFFF
- mov es,ax
- xor si,si
- push ax
- push si
- retf
- end;
-
- procedure WarmBoot; assembler;
- asm
- xor ax,ax
- mov ds,ax
- mov ah,$40
- mov es,ax
- mov word ptr es:$72,$1234
- mov ax,$FFFF
- mov es,ax
- xor si,si
- push ax
- push si
- retf
- end;
-